home *** CD-ROM | disk | FTP | other *** search
/ Animation How-To / Animation How-to CD.iso / PLY / CHAPTER3 / ROCKY / ROCK2.PI < prev    next >
Text File  |  1994-01-01  |  752b  |  47 lines
  1. // ROCK2.PI - Rocking color weirdness, done with include files
  2.  
  3. start_frame 0
  4. end_frame 29
  5. total_frames 30
  6.  
  7. outfile "rock2"
  8.  
  9. define pi 3.1415927
  10. define rad pi/180
  11.  
  12. define phz 360*frame/total_frames
  13.  
  14. // Lights 
  15.  
  16. light <0.5, 0.5, 0.5>, < 180, 150, -150>
  17. light <0.5, 0.5, 0.5>, < 0, 100, -15>
  18. light <0.5, 0.5, 0.5>, < 0, 0, 0>
  19.  
  20. // Camera
  21. viewpoint {
  22.    from <300,200,-250>
  23.    at <0,0,0>
  24.    up <0,1,0>
  25.    angle 90+30*cos(phz*rad)
  26.    aspect 1.433*2
  27.    resolution 320,100
  28.    }
  29.  
  30. // Action
  31. include "colormap.inc"
  32.  
  33. include "text1.inc"
  34.  
  35. define tx 100*sin(phz*rad)
  36. define ty 50*sin(phz*rad)
  37. define tz 100*sin(phz*rad)
  38.  
  39. // Create a volume
  40. object {
  41.    sphere <0,0,0>, 540
  42.    color_phase
  43.    translate <tx,ty,tz>
  44.    }
  45.  
  46.  
  47.